﻿Module ModMain

    Sub Main(ByVal args() As String)
        Dim srvc As New PhlogiosMain
        srvc.DebugStart(args)
        Console.WriteLine("Press [Enter] to exit")
        Console.ReadLine()
        srvc.DebugEnd()
    End Sub

End Module
